home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 52 / Amiga Format AFCD52 (Issue 136, May 2000).iso / -screenplay- / shareware / muscarine / 22.room < prev    next >
Text File  |  2000-02-29  |  7KB  |  157 lines
  1. /* Onius Ant
  2. /* Room script for GRAAL
  3. /*
  4. /* RF 1=1 sthg. bright quest solved
  5. /* RF 2=1 sthg. dark quest solved
  6. /* RF 3=1 sthg. hot quest solved
  7. /* RF 4=1 green snow quest solved
  8. /* RF 5=1 all solved
  9.  
  10. /* UPDATE: scroll_frames[;normal_frames]
  11. /*
  12. UPDATE: 6;1
  13.  
  14. /* 3D: max;mid;min;adjspeed (This statement is optional)
  15. /*
  16. /* SECTION: SAME|section_no
  17. /*
  18. SECTION: 2
  19.  
  20. /* BACKDROP: file
  21. /*
  22. BACKDROP: 22BG.iff
  23.  
  24. /* START_POS: startpos_no;image;x;y;L|M|R;floor_no
  25. /*
  26. START_POS: 1;SIMG11;285;137; ;1
  27.  
  28. /* FLOOR: floor_no;x1;y1;x2;y2;floormaps
  29. /*
  30. FLOOR: 1;209;118;303;169;1-1/2-2
  31. FLOOR: 2;9;166;317;169;1-1/2-2
  32.  
  33. /* PATH: path_no;floor1;floor2;px1;py1;px2;py2;[{more_points}] (This statement is optional)
  34. /*
  35. /* EXIT: exit_no;x1;y1;x2;y2;x;y;description (This statement is optional)
  36. /*
  37. EXIT: 1;289;37;312;136;286;137;exit
  38.  
  39. /* CLPART: file (This statement is optional)
  40. /*
  41. CLPART: 22FG.iff
  42.  
  43. /* ROOMIMGS: number;start_bob;x1;y1;w;h;x-offset;hotspot (This statement is optional)
  44. /* 1,7=Onius lying 2=lying shadow
  45. ROOMIMGS: 1;1;0;148;151;58;0;0
  46. ROOMIMGS: 1;2;0;207;151;18;0;-63
  47. /* 3-6=Onius talk
  48. ROOMIMGS: 4;3;0;0;65;146;65;48/2
  49. ROOMIMGS: 1;7;152;148;151;58;0;0
  50.  
  51. /* STATIC: bob;image;x;y (This statement is optional)
  52. /*
  53. STATIC: 2;RIMG2;123;82
  54.  
  55. /* ANIM: bob;image;anim_ch;anim|ptrn;x;y (This statement is optional)
  56. /*
  57. /* ROOMOBJ: obj;name;room;VIS|NVIS;bob;image;x;y;cx;cy;cimage;prep;PICK|NPICK;anim_ch;verb;icon;LOW|MID|HIGH;types;w1;w2;w3 (This statement is optional)
  58. /*
  59. /* DACT: {cond|comm}
  60. /*
  61. DACT: TRACK 21.mod,0,NOFILTER
  62. DACT: LIGHTS ON;EXIT
  63.  
  64. /* LINE: dlg;line_no;sentence1;sentence2| ;{cond} (This statement is optional)
  65. /* LACT: dlg;line_no;{cond|comm} (This statement is optional)
  66. /*
  67. LINE: 11;1;I wonder if you could help me destroy\the Universe?; ; 
  68. LACT: 11;1;RESP S,11,I can't help you to destroy the Universe, sorry.
  69. LACT: 11;1;RESP S,11,But I can help you to reach the Plane of Gods.
  70. LACT: 11;1;SAY And there I'll find a way to destroy the Universe?
  71. LACT: 11;1;RESP S,11,Yes, but it's a very dangerous journey to the Plane of Gods.
  72. LACT: 11;1;RESP S,11,You need four things to reach the Plane of Gods.
  73. LACT: 11;1;RESP S,11,Once you have these four things you have to pass through the dimension of slime and ooze.
  74. LACT: 11;1;DSET 11,N1,+2,+3;EXIT
  75.  
  76. LINE: 11;2;What do I need to reach the Plane of Gods?; ; 
  77. LACT: 11;2;RESP S,11,You need four things: something very bright, something very dark, something very hot and...
  78. LACT: 11;2;SAY And something very cold?!;RESP S,11,No, some green snow!;SAY Green snow?;RESP S,11,Yes, some real green snow.
  79. LACT: 11;2;RESP S,11,Bring me these things and I'll help you get to the Plane of Gods.
  80. LACT: 11;2;SETOF 44,1=1;SETRF 12,1=1;DSET 11,N2,-4;EXIT
  81.  
  82. LINE: 11;3;What is the dimension of slime and ooze?; ; 
  83. LACT: 11;3;RESP S,11,It's a very dangerous place. If you find no way out you have to stay there forever.
  84. LACT: 11;3;RESP S,11,But it's the only way to reach the plane of gods. You have to go through the dimension of slime and ooze.
  85. LACT: 11;3;DSET 11,N3;EXIT
  86.  
  87. LINE: 11;4;What else do I need to reach the Plane of Gods?; ;IFRF 5=0;IFOF 44,1=1|2
  88. LACT: 11;4;IFRF 1=0;RESP S,11,Something very bright.
  89. LACT: 11;4;IFRF 2=0;RESP S,11,Something very dark.
  90. LACT: 11;4;IFRF 3=0;RESP S,11,Something very hot.
  91. LACT: 11;4;IFRF 4=0;RESP S,11,Some green snow.
  92. LACT: 11;4;DSET 11,-4;EXIT
  93.  
  94. LINE: 11;5;See you later.; ; 
  95. LACT: 11;5;RESP S,11,Goodbye.;EDLG;BOBON 2,123,82,RIMG2;SHOW 26,123,144,PTRN 1;EXIT
  96.  
  97. LINE: 11;6;Yes, I'm ready.; ;IFRF 5=1
  98. LACT: 11;6;RESP S,11,Then you'll go. But remember that you have to pass through the dimension of slime and ooze first.
  99. LACT: 11;6;SAY Can you give me some hints how I get through the slime and ooze dimension?
  100. LACT: 11;6;RESP S,11,No, I'm sorry. You have to find your way alone. Goodbye Erica!
  101. LACT: 11;6;SAY Goodbye.;EDLG;GOTO 39,1
  102.  
  103. LINE: 11;7;No, wait a moment.; ; 
  104. LACT: 11;7;RESP S,11,Ok, come back when you are ready.;DSET 11,R1,N7,N6,+8;EDLG;BOBON 2,123,82,RIMG2;SHOW 26,123,144,PTRN 1;EXIT
  105.  
  106. LINE: 11;8;I am now ready to travel to the Plane of Gods.; ;IFRF 5=1
  107. LACT: 11;8;RESP S,11,Then you shall go. But remember that you have to pass through the dimension of slime and ooze first.
  108. LACT: 11;8;SAY Can you give me some hints how I get through the slime and ooze dimension?
  109. LACT: 11;8;RESP S,11,No, I'm sorry. You have to find your way alone. Goodbye Erica!
  110. LACT: 11;8;SAY Goodbye!;EDLG;GOTO 39,1
  111.  
  112. /* ACTION: verb_no;{cond|comm} (This statement is optional)
  113. /*
  114. /* Action 0 - Exit
  115. ACTION: 0;IFOBJ 1;MEXIT;GOTO 21,2
  116.  
  117. /* Action 1 - Give
  118. ACTION: 1;IFOBJ 44;IFOBJ2 26;MOBJ 26;BOBOFF 2;SHOW 26,182,20,RIMG3
  119. ACTION: =;SAY I have this very bright sunray here.;HANDLE HIGH;SETRF 1=1
  120. ACTION: =;RESP S,11,Ok, that is something bright.;PUT 44,U,0;HANDLE -1
  121. ACTION: 1;IFOBJ 25;IFOBJ2 26;MOBJ 26;BOBOFF 2;SHOW 26,182,20,RIMG3
  122. ACTION: =;SAY I have this very dark shadow here.;HANDLE HIGH;SETRF 2=1
  123. ACTION: =;RESP S,11,Ok, that is something dark.;PUT 25,U,0;HANDLE -1
  124. ACTION: 1;IFOBJ 45;IFOBJ2 26;IFOF 45,1=3;MOBJ 26;BOBOFF 2;SHOW 26,182,20,RIMG3
  125. ACTION: =;SAY I have some molten lava here.;HANDLE HIGH;SETRF 3=1
  126. ACTION: =;RESP S,11,Ok, that is something hot.;PUT 45,U,0;HANDLE -1
  127. ACTION: 1;IFOBJ 32;IFOBJ2 26;MOBJ 26;BOBOFF 2;SHOW 26,182,20,RIMG3
  128. ACTION: =;SAY I have some green snow here.;HANDLE HIGH
  129. ACTION: =;PUT 32,U,21;W 12;HANDLE -1
  130. ACTION: 1;IFOBJ 32;IFOBJ2 26;IFRF 21,1=1;IFRF 21,5=1;SETRF 4=1;RESP S,11,Ok, this is real green snow.
  131. ACTION: 1;IFOBJ 32;IFOBJ2 26;IFRF 21,5=0;RESP S,11,I asked you for real green snow. This is not real green snow, it's just a mixture of yellow and blue snow.
  132. ACTION: =;RESP S,11,Now go and bring me some real green snow. Don't try to cheat!
  133. ACTION: =;RESP S,11,You have to learn to avoid roundabout ways. Just take what you need when you see it.;SETRF 21,1=1;BOBON 2,123,82,RIMG2;SHOW 26,123,144,PTRN 1;EXIT
  134. ACTION: 1;IFOBJ 25|32|44|45;IFOBJ2 26;IFRF 1=1;IFRF 2=1;IFRF 3=1;IFRF 4=1;SETRF 5=1;RESP S,11,You have now brought me all four items. Are you ready to travel to the Plane of Gods now?;DSET 11,S1,+6,+7;EXIT
  135. ACTION: 1;IFOBJ 25|32|44;IFOBJ2 26;RESP S,11,Now go and bring me the remaining items.;BOBON 2,123,82,RIMG2;SHOW 26,123,144,PTRN 1;EXIT
  136. ACTION: 1;IFOBJ 45;IFOBJ2 26;IFOF 45,1=3;RESP S,11,Now go and bring me the remaining items.;BOBON 2,123,82,RIMG2;SHOW 26,123,144,PTRN 1;EXIT
  137.  
  138. /* Action 2- Pick up
  139. /*
  140. /* Action 3 - Use
  141. /*
  142. /* Action 4 - Open
  143. /*
  144. /* Action 5 - Talk to
  145. ACTION: 5;IFOBJ 26;MOBJ;BOBOFF 2;SHOW 26,182,20,RIMG3;RESP S,11,Hello Erica.;SAY Hello.;DSET 11,+1,+4,+5,+6;EXIT
  146.  
  147. /* Action 6 - Consume
  148. /*
  149. /* Action 7 - Close
  150. /*
  151. /* Action 8 - Look at
  152. /*
  153. /* Action 9 - Attack
  154. /*
  155. /*
  156. /* end of room file
  157.